From 5da841d2d5ef64f5354c71edaa908b360aa8b81e Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Mon, 8 Nov 1993 13:14:05 +0000 Subject: [PATCH] (set-frame-configuration): Iconify frames rather than making them invisible. --- lisp/frame.el | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) diff --git a/lisp/frame.el b/lisp/frame.el index b64256eedb4..9ef36acf308 100644 --- a/lisp/frame.el +++ b/lisp/frame.el @@ -403,7 +403,7 @@ Each frame listed in CONFIGURATION has its position, size, window configuration, and other parameters set as specified in CONFIGURATION. Ordinarily, this function deletes all existing frames not listed in CONFIGURATION. But if optional second argument NODELETE -is given and non-nil, the unwanted frames are made invisible instead." +is given and non-nil, the unwanted frames are iconified instead." (or (frame-configuration-p configuration) (signal 'wrong-type-argument (list 'frame-configuration-p configuration))) @@ -426,7 +426,11 @@ is given and non-nil, the unwanted frames are made invisible instead." (setq frames-to-delete (cons frame frames-to-delete)))))) (frame-list)) (if nodelete - (mapcar 'make-frame-invisible frames-to-delete) + ;; Note: making frames invisible here was tried + ;; but led to some strange behavior--each time the frame + ;; was made visible again, the window manager asked afresh + ;; for where to put it. + (mapcar 'iconify-frame frames-to-delete) (mapcar 'delete-frame frames-to-delete)))) (defun frame-configuration-p (object) -- 2.30.2